home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AOL File Library: 4,401 to 4,500
/
aol-file-protocol-4400-4401-to-4500.zip
/
AOLDLs
/
PDA-Newton Development
/
ND CheckPlease 2.0 source
/
CheckPlease2.0(src).sit
/
CheckPlease_Source
/
Project Data
< prev
next >
Wrap
Text File
|
1995-02-28
|
1KB
|
41 lines
CONSTANT kPackageName := "CheckPlease";
CONSTANT kAppName := "Check Please!";
CONSTANT kAppSymbol := '|CheckPlease:VtHick|;
constant kVersion := "2.0";
constant kMaxAppWidth := 240; // maximum value for right bounds
constant kMinAppWidth := 238; // minimum value for left bound
constant kMaxAppHeight := 400; // maximum value for bottom bounds
constant kMinAppHeight := 312; // minimum value for bottom bounds
DEFCONST('kPrefsForSystemSoup,{tag:kPackageName,tip:20,tax:0});
// Install and Remove Scripts
// script run when package is installed
// NOTE: you can also do this from
// your viewSetupFormScript
InstallScript := func(partFrame)
begin
// put application routing frame into the
// global routing frame
Routing.(kAppSymbol) := partFrame.theForm.routingFrame;
// nil out InstallScript to free up memory
InstallScript := devInstallScript := nil;
end;
// script run when package is removed from Newt
// you might also remove formats (see below)
RemoveScript := func(partFrame)
begin
// remove application routing frame from
// global routing frame
RemoveSlot(Routing, kAppSymbol);
end;